home *** CD-ROM | disk | FTP | other *** search
-
- /********************************************************************
- * *
- * Source File: COLOR.c *
- * Description: Marc's Stock Application *
- * Date: Fri Jun 21 18:47:42 1991 *
- * *
- ********************************************************************/
-
- #include <windows.h>
- #include <time.h>
- #include <pv.h>
- #include "stock.h"
-
-
- //VARIABLES_BEGIN
- //VARIABLES_END
-
- VIEW COLOR;
- HWND hWndCOLOR;
-
- extern HANDLE hInst; /* Application Instance handle */
-
- int fnCOLOR(HWND hParentWnd)
- {
- int RetCode;
-
- //BEGINFUNCTION_BEGIN
- //BEGINFUNCTION_END
-
- lpfnCOLORViewProc = (VIEWPROC)MakeProcInstance((FARPROC)COLORViewProc, hInst);
- if(!(COLOR = vwCreateView(hInst,
- "COLOR",
- hParentWnd,
- lpfnCOLORViewProc,
- lpfnMakeLongPointer)))
- return FALSE;
-
-
-
-
- //INITVIEW_BEGIN
- //INITVIEW_END
- if((RetCode = vwShowModalView(COLOR)) == -1)
- {
- MessageBox(NULL, "Unable to display view", "System Error",
- MB_SYSTEMMODAL | MB_ICONHAND | MB_OK);
- return FALSE;
- }
-
- //TERMVIEW_BEGIN
- //TERMVIEW_END
- FreeProcInstance((FARPROC)lpfnCOLORViewProc);
- return(RetCode);
- }
-
- long FAR PASCAL COLORViewProc(HWND hWnd, WORD wMessage, WORD wParam, LONG lParam)
- {
- GETVIEW;
- //WINDOWPROCVARIABLES_BEGIN
- //WINDOWPROCVARIABLES_END
-
- switch(wMessage)
- {
- //WINDOWPROC_BEGIN
- //WINDOWPROC_END
-
- case WM_INITDIALOG :
- //WM_INITDIALOG_BEGIN
- //WM_INITDIALOG_END
- break;
-
- case WM_COMMAND :
- if(HIWORD(lParam) == BN_CLICKED)
- switch(wParam)
- {
- case IDOK :
- //IDCOLOR_OK_BEGIN
- //IDCOLOR_OK_END
- break;
-
- case IDCANCEL :
- //IDCOLOR_CANCEL_BEGIN
- //IDCOLOR_CANCEL_END
- break;
-
- //CUSTOMCOMMAND_BEGIN
- //CUSTOMCOMMAND_END
- }
- break;
-
- }
- return DefViewProc(hWnd, wMessage, wParam, lParam);
- }
-
- //CUSTOMCODE_BEGIN
- //CUSTOMCODE_END
-